home *** CD-ROM | disk | FTP | other *** search
- on quitRoutine_OLD
-
- if the commandDown and the key = "m" then
-
- puppetSound "high beep"
- muteVolume
-
- dontPassEvent
-
- else if the key = numToChar (30) then
-
- puppetSound "high beep"
- volumeUp
-
- dontPassEvent
-
- else if the key = numToChar (31) then
-
- puppetSound "high beep"
- volumeDown
-
- dontPassEvent
-
- end if
-
- -- if (the keyCode = 113 and the machineType <> 256) or (the commandDown and the key = ENTER and the machineType <> 256) then
- --
- -- if objectP(finderSwitch) then
- -- finderSwitch(mDispose)
- -- end if
- --
- -- put FinderSwitcher(mNew) into finderSwitch
- -- if objectP(finderSwitch) then finderSwitch(mSwitchToFinder)
- --
- -- end if
-
-
- if the commandDown and the key = "Q" then
-
- quitThisProgram
-
- end if
-
- if the commandDown and the key = "l" and the frame <=23 and the frame >= 16 then
-
- startIt
-
- end if
-
-
- if the commandDown and the key = "w" then
-
- closeIt
-
- end if
-
-
- end quitRoutine